Credential-Auth-Token names an undocumented function, with lambda list (OBJECT).
(SETF Credential-Auth-Token) names an undocumented function, with lambda list (NEW-VALUE OBJECT).